Option Explicit
'u@Ҳ
Private Sub Worksheet_Calculate()
    MsgBox Me.Name & "iFpC"
End Sub
